<?
   require("../configuracion.php");
   $idSysSection = $sectionINIT;
   require("../application-top.php");
   
   require("permisible_functions.php");
   
	$st_Query="SELECT count(*) as pacientes FROM  tbl_UsuariosWeb;";
    $result = mssql_query ($st_Query);
    $row = mssql_fetch_object($result);
	$pacientes = $row->pacientes;

	$st_Query="SELECT     COUNT(*) AS muestras FROM  tbl_EvProductosUsuarioWeb INNER JOIN
                      tbl_UsuariosWeb ON tbl_EvProductosUsuarioWeb.id_UsuarioWeb = tbl_UsuariosWeb.id_UsuarioWeb
WHERE     (tbl_EvProductosUsuarioWeb.st_FolioInserto = '5250200000000');";
    $result = mssql_query ($st_Query);
    $row = mssql_fetch_object($result);
	$muestras = $row->muestras;

	$st_Query="SELECT     COUNT(*) AS productos FROM  tbl_EvProductosUsuarioWeb INNER JOIN
                      tbl_UsuariosWeb ON tbl_EvProductosUsuarioWeb.id_UsuarioWeb = tbl_UsuariosWeb.id_UsuarioWeb
WHERE     (tbl_EvProductosUsuarioWeb.st_FolioInserto <> '5250200000000');";
    $result = mssql_query ($st_Query);
    $row = mssql_fetch_object($result);
	$productos = $row->productos;

	$query="SELECT     DATEDIFF(mm,MIN(dt_FechaRegistro),MAX(dt_FechaRegistro)) AS meses FROM  tbl_UsuariosWeb;";
    $result = mssql_query ($query);
    $row = mssql_fetch_object($result);
	$meses = $row->meses + 1;

   
?>
<html>
<head>
  <title><?= $instanciaECRM ?></title>
  <link rel="stylesheet" href="../styles/style.css" type="text/css">
  <script type="text/javascript" src="../scripts/date.js"></script>
</head>
<body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<table border="0" cellpadding="5" cellspacing="0" width="750">
  <tr><td><strong class="systemTitleHome"><?= $instancitaECRM ?></strong></td></tr>
</table>
<br>
<br>
<table border="0" cellspacing="5" cellpadding="5">
  <tr>
    <td colspan="3" class="tit3">Permisible</td>
	</tr>
  <tr>
    <td width="50">&nbsp;</td>
	<td>Pacientes:<?= $pacientes ?><br>Muestras:<?= $muestras ?><br>Productos:<?= $productos ?><br>Meses:<?= $meses ?></td>
 <td>&nbsp;</td>
  </tr>
  <tr>
    <td width="50">&nbsp;</td>
	<td>Ingresos:(<?= ingresos("") ?>)<br>Costos:(<?= egresos("") ?>)<br>Costo Promedio Miembro:<?= costoPromedioMiembro() ?><br></td>
 <td>&nbsp;</td>
  </tr>
  <tr>
    <td width="50">&nbsp;</td>
	<td>Ingresos:(<?= ingresos(1071) ?>)<br>Costos:(<?= egresos(1071) ?>)<br>Costo Promedio Miembro:<?= costoPromedioMiembro() ?><br></td>
 <td>&nbsp;</td>
  </tr>
</table>
</body>
</html>
